home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1999 #2 / Amiga Plus CD - 1999 - No. 2.iso / System-Boost / Grafik / raylabwos / scenes / table.rl < prev    next >
Encoding:
Text File  |  1998-11-08  |  2.7 KB  |  152 lines
  1. #
  2. # This is an example scene for RayLab 1.0
  3. #
  4. # Author:  Marcus Geelnard
  5. # Date:    28-Nov-95
  6. #
  7.  
  8.  
  9. Globals:
  10.     backgroundcolor 0 0.2 0.6    ; We want a clear blue sky
  11. :end
  12.  
  13.  
  14.  
  15. **
  16. **  The first object of the scene is a checkered plane
  17. **
  18.  
  19. PLANE:
  20.     normal  0 0 1
  21.     offset  0
  22.     texture:                     ; The surface of the plane is well-
  23.         pattern  checker         ;  polished and has blue checkers.
  24.         colormap 2
  25.             0.0  0 0 0.2
  26.             1.0  0.8 0.9 1.0
  27.         diffuse  0.7
  28.         ambient  0.3
  29.         phong    0.6
  30.         reflect  0.45 0.49 0.6
  31.         transform:
  32.             scale 0.4 0.4 0.4
  33.         :end
  34.     :end
  35. :end
  36.  
  37.  
  38.  
  39. **
  40. **  The next part of the scene will feature a table
  41. **
  42.  
  43.  
  44. Deftexture:                      ; Next we will declare a default texture
  45.     pattern rings                ;  that looks like dark wood, which will
  46.     colormap 5                   ;  be used for the table.
  47.         0.0  0.6 0.4 0.0
  48.         0.4  0.5 0.3 0.0
  49.         0.5  0.3 0.1 0.0
  50.         0.6  0.5 0.2 0.0
  51.         1.0  0.6 0.4 0.0
  52.     diffuse 0.8
  53.     ambient 0.2
  54.     phong   0.4
  55.     phongsize 20
  56.     reflect 0 0 0
  57.     transform:
  58.         scale   0.04 0.04 0.04
  59.         rotate  50 0 10
  60.     :end
  61. :end
  62.  
  63.  
  64. BOX:
  65.     corners  -0.6 -1.0 0.8       ; Here is the top of the table.
  66.               0.6  1.0 0.86
  67. :end
  68.  
  69.  
  70. BOX:
  71.     corners  -0.03 -0.03 0.0     ; ...and here come the legs.
  72.               0.03  0.03 0.8
  73.     transform:
  74.         move  -0.52 -0.92 0.0
  75.     :end
  76. :end
  77.  
  78. BOX:
  79.     corners  -0.03 -0.03 0.0
  80.               0.03  0.03 0.8
  81.     transform:
  82.         move  0.52 -0.92 0.0
  83.     :end
  84. :end
  85.  
  86. BOX:
  87.     corners  -0.03 -0.03 0.0
  88.               0.03  0.03 0.8
  89.     transform:
  90.         move  -0.52 0.92 0.0
  91.     :end
  92. :end
  93.  
  94. BOX:
  95.     corners  -0.03 -0.03 0.0
  96.               0.03  0.03 0.8
  97.     transform:
  98.         move  0.52  0.92 0.0
  99.     :end
  100. :end
  101.  
  102.  
  103. Deftexture:
  104.     default                     ; Reset the default texture
  105. :end
  106.  
  107.  
  108.  
  109. **
  110. **  Somebody has left a ball on the floor
  111. **
  112.  
  113. SPHERE:
  114.     centre 0 0 0
  115.     radius 0.2
  116.     texture:
  117.         colormap 2
  118.             0.0  0 1 0
  119.             1.0  1 0 0
  120.         pattern checker
  121.         phong  0.7
  122.         phongsize 40
  123.         reflect 0.3 0.3 0.3
  124.         diffuse 0.6
  125.         ambient 0.4
  126.         transform:
  127.             rotate 40 20 0
  128.        *    move -0.3 -1.2 0.2  ; Uncomment for RayLab 1.0
  129.         :end
  130.     :end
  131.     transform:
  132.         move -0.3 -1.2 0.2
  133.     :end
  134. :end
  135.  
  136.  
  137.  
  138. **
  139. **  And then we have the light-sources and the camera
  140. **
  141.  
  142. LIGHT:
  143.     location -3 -2 2            ; A white light-source is added
  144.     color     1 1 1
  145. :end
  146.  
  147.  
  148. CAMERA:
  149.     location  2 -3 1.4          ; And a camera is placed to
  150.     viewpoint 0 -0.4 0.5        ; look the table (use default aspect)
  151. :end
  152.